home *** CD-ROM | disk | FTP | other *** search
/ QuickTime 1.0 for Developers / QuickTime 1.0 for Developers.iso / Goodies / DiVA VideoShop™ / Visual Catalog / Visual Catalog / card_5445.xml < prev    next >
Extensible Markup Language  |  1991-09-06  |  4KB  |  112 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  3. <card>
  4.     <id>5445</id>
  5.     <filler1>0</filler1>
  6.     <cantDelete> <false /> </cantDelete>
  7.     <showPict> <true /> </showPict>
  8.     <dontSearch> <false /> </dontSearch>
  9.     <owner>4820</owner>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_3098.css" />
  11.     <part>
  12.         <id>26</id>
  13.         <type>button</type>
  14.         <visible> <true /> </visible>
  15.         <reserved5> 0 </reserved5>
  16.         <reserved4> 0 </reserved4>
  17.         <reserved3> 0 </reserved3>
  18.         <reserved2> 0 </reserved2>
  19.         <reserved1> 0 </reserved1>
  20.         <enabled> <true /> </enabled>
  21.         <rect>
  22.             <left>2</left>
  23.             <top>0</top>
  24.             <right>22</right>
  25.             <bottom>20</bottom>
  26.         </rect>
  27.         <style>transparent</style>
  28.         <showName> <false /> </showName>
  29.         <highlight> <false /> </highlight>
  30.         <autoHighlight> <false /> </autoHighlight>
  31.         <sharedHighlight> <true /> </sharedHighlight>
  32.         <family>0</family>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>136</icon>
  35.         <textAlign>center</textAlign>
  36.         <font>Chicago</font>
  37.         <textSize>12</textSize>
  38.         <textStyle>plain</textStyle>
  39.         <name>New Button</name>
  40.         <script></script>
  41.     </part>
  42.     <part>
  43.         <id>45</id>
  44.         <type>field</type>
  45.         <visible> <false /> </visible>
  46.         <dontWrap> <false /> </dontWrap>
  47.         <dontSearch> <false /> </dontSearch>
  48.         <sharedText> <false /> </sharedText>
  49.         <fixedLineHeight> <false /> </fixedLineHeight>
  50.         <autoTab> <false /> </autoTab>
  51.         <lockText> <true /> </lockText>
  52.         <rect>
  53.             <left>32</left>
  54.             <top>220</top>
  55.             <right>47</right>
  56.             <bottom>234</bottom>
  57.         </rect>
  58.         <style>transparent</style>
  59.         <autoSelect> <false /> </autoSelect>
  60.         <showLines> <false /> </showLines>
  61.         <wideMargins> <false /> </wideMargins>
  62.         <multipleLines> <false /> </multipleLines>
  63.         <reservedFamily> 0 </reservedFamily>
  64.         <titleWidth>0</titleWidth>
  65.         <icon>0</icon>
  66.         <textAlign>left</textAlign>
  67.         <font>Geneva</font>
  68.         <textSize>12</textSize>
  69.         <textStyle>plain</textStyle>
  70.         <textHeight>16</textHeight>
  71.         <name>return help</name>
  72.         <script></script>
  73.     </part>
  74.     <content>
  75.         <layer>background</layer>
  76.         <id>31</id>
  77.         <text>Master Key Words List:</text>
  78.     </content>
  79.     <content>
  80.         <layer>background</layer>
  81.         <id>37</id>
  82.         <text>Director:</text>
  83.     </content>
  84.     <content>
  85.         <layer>background</layer>
  86.         <id>38</id>
  87.         <text>User2:</text>
  88.     </content>
  89.     <content>
  90.         <layer>background</layer>
  91.         <id>43</id>
  92.         <text>Menus Control</text>
  93.     </content>
  94.     <content>
  95.         <layer>background</layer>
  96.         <id>33</id>
  97.         <text>bar chart,Image Bank,nature,sportsBeach,sportsWater,spread sheet,sunset,water,women</text>
  98.     </content>
  99.     <content>
  100.         <layer>background</layer>
  101.         <id>35</id>
  102.         <text>BergmannHitchcockSpielbergKlam & VemmeligScott</text>
  103.     </content>
  104.     <content>
  105.         <layer>background</layer>
  106.         <id>36</id>
  107.         <text>abc</text>
  108.     </content>
  109.     <name>control</name>
  110.     <script>-- Note:  global var "upDate" is used ONLY on this cardon openCardglobal upDateput empty into upDateif the icon of bg button "number" is not 128 thensend mouseUp to bg button "number"end ifsetScreenunlock screenpass openCardend OpenCard-- check for changeson openFieldglobal upDateput true into upDatepass openFieldend openField-- verifyfunction verifyanswer "Erase the contents of this field?" with "Cancel" or "OK"if it is "OK" thenreturn trueelsereturn falseend ifend verify-- catch/upgrade changeson closeCardglobal upDateif upDate is true thenput empty into upDateanswer "There have been changes.  Upgrade database?"¬¨with "No" or "Yes"if it is "No" then exit closeCardlock screenlock messages-- get infoput fld "key menu" into keyMenuput fld "cat 1" into cat1put fld "cat 1 menu" into cat1Menuput fld "cat 2" into cat2put fld "cat 2 menu" into cat2Menu-- alphabetize key wordsput translateCR(keyMenu) into keyMenuput isort(keyMenu) into keyMenuput translateRC(keyMenu) into keyMenuput keyMenu into fld "key menu"-- place info in databasepush cardgo first card of background "segment info"put keyMenu into fld "key words menu"put cat1 into fld "category 1 name"put cat1Menu into fld "category 1 menu"put cat2 into fld "category 2 name"put cat2Menu into fld "category 2 menu"pop cardunlock messages-- doneend ifpass closeCardend closeCard</script>
  111. </card>
  112.